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2/3/76 Major revision, K.M.R. 
Name changed to B1700 COBOL S-LANGUAGE, 
Translated to upper case and lower case, 
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REVISIONS 


PAGES REVISED ADDED DELETED OR ‘ 
CHANGE OF CLASSIFICATION REPARED BY APPROVED BY 


12-Xx-70 Transferred from P.S. #1912 3553 


Sec. 1.1 Changed some names of program 
parameters 
Moved reinstate info to above limit register 
Changed L TYPE BIT assignment 
Changed method of Address calculatiqn 
Added Segment +# 
Changed DATA TYPE BIT Assignment 
Changed Indexing BIT Assignment 
O Added ASCII flag description 
Deleted CNZ (Compare for N Zero) 
instruction 
through 3.4.6 Added ASCII code sensitijvity changes 
where necessary (see section 2.2.10 
Deleted CONVERT SIGN Instruction. 
Restricted MUL result field to 4-bit 
format 
Required COPX2 data length be equal 
to the sum of the lengths of the opgrands 
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Restricted DIV result field to 4-bi 
format. 
3.1.6 Required COPX1 data length be equal 
to the difference of the lengths of |the 
operands. 
2.11 Added MVT (Move Translate) instruction 
2.12 Changed order of OPND2 and COPX2. 
.2.13 Deleted SKIP Forward Destination operator. 
4 and 3.4.6 Reversed BRANCH Taken-Not 
Taken Condition 
Changed Relational Condition Bit Agsignments 
4.3 Generalized ZRO to full relational test. 
-4.4 Generalized SPA to full relational test. 


c. 1 Changed typical program memory layout. 
1 Major change of program parameters. 
0 Changed OP from 8 to 9 bits. 
-l1.5 Added In-Line-COP Information 
2 Deleted Fdit Mask Address, Added Tabfe Bound. 
2.2 Changed BASE REGISTER to Base of 

Data Segment. 
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PAGES REVISED ADCED CELETED OR 
CHANGE OF CLASSIFICATION PREPARED BY APPROVED BY 


REVISION 
ISSUE DATE 


Cont, 

B 2.2.6 & 2.2.7 & 2.2.8 Changed method of indicating 
number of subscripts/indexes. 

2.2./& Added out of range-condition on sub 

2.2.8 scripting and indexing 

2.2.9 Added description of Table Bound. 
Deleted Edit Mask Address descriptipn. 

3.0 Added DADDR in Edit. Moved N variant 
and changed BADDR to BDISP in GTD. 
Added BOF, OFY, CRPT, COMM, FCMP, CNV 
and LDS operators. 

3.1.6 Added: Division by zero results in 
overflow toggle being set. Dividen 
not quotient field must be 4-bit. 

3.2.18 .3 & .11 Added statement on overla 
of fields. 

3.10 SMVN- COPX1 changed to OPND1. 

3.2.13 Restricted destination field of Edif 
to 8-bit format 

3.2.13.1 Added DADDR to edit instruction. 

3.2.13.2 Corrected bit type from 10 to Ol. 

3.2.13.3 S=0 Changed to S=l throughout added 
S=0, T=8 and S=1, T=9 to Insert on 

Minus. 

223 Major change to branch types. 

3.3.2 & .~3 Added BOF and OFL. 

3.3.2.8 GTD-Moved N variant. 

3.3.4 Major change in branch types. 

3.4./ Added CRPT. 

Seely, Beeld sy Bele ly. S00 Aaded COMM, 

C 


CNV, LDS 
Sec 1: Deleted address store and added WFK KO ii am 
alter table to table. di ve . 
1.1 Changed BDISPB to BDISP1 
2.2 Changed min size of seq # container [= PE fel 77. 
from 1 to 0. Specified max size of _ 
LENB as 13 and 14 for 8 & 4 bit data wesp. 
2.2.7 Specified subscript value of <0 re- 
sults in error comm. Added overflow 
is ignored if sum of subscript values 
exceed 24 bits. 
2.2.8 Added sign position to index registar 
& detection when it is negative. 
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COBOL S-LANGUAGE 


REVISIONS 


PAGES REVISED ADDED DELETED OR 
CRANGE OF CLASSIFICATION 


REVISION 


ISSUE DATE PREPARED BY APPROVED BY 


| Sec. 3.0 Added OP code and changed some 
nmemonics 
| 3.1 Changed no restriction as to type to 
restriction as to type are specified 
under description of various operations}. 
3.1.6 Changed dividend from OPND to COPX oplerand 
3.2.10 Scale factor length must be < dest. 
field length if V=O and < source field 
length if v=l. 7 
3.2.11 Added COPX1 to describe translation 
table. 
3.2.12 Examine: deleted 
3.2.13 Deleted S=0, T=8, and S=1l, T=9 entri 
3.2.14 & 3.2.15 Added MCF & MCE operators 
3.3 Deleted self-relative branches. Change 
format of BADDR 
3.3.4 PERF: Changed format of stack entry 
3.3.8 GOTD: Changed name of BDISP to DBADDR 
-and changed format 
3.4 Specified order of operands 
| 3.4.3 CMPX: Changed binary compare to 
algebraic. Specified order of operands 
3.4.4 CMPS: Specified order of operands, 
3.4.5 CMPC: Restricted to UA. 
3.4.7 Deleted req't that OPNDI size be largler 
than 2. 
| 3.5.1 Address stored as absolute instead of 
relative. 
3.5.2 LDCR name changed from FCMP 
3.5.3 CNV: Changed operand from OPND to COPK. 
3.5.4 MAKP name changed from LDSN. DSEGN 
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argument changed to COPXI. | 
bee: D2al 0). Saye eleoy, GeluOs eres Sa 255) WFK AZ Zs Zp/9 a 
3.4.6: MMVA, MMVS, MMVN, MMVZ and CMPM a 
cperators deleted. ivi YY fp ae 
3.2.9 Thru 3.2.15 renumbered to 3.2.5 thru | Cog, é 
Sele is ae 
-2.8 Added Examine operator. oe 


342. 
3.2.11 Corrected Tally register to COPX3. 
3.4.5 Specified sign position is ignored fqr 
Signal 8-bit format in the numeric test. 
3.4. / renumbered to 3. 4.6 
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GENERAL 


B1700 COB0L S-Language provides the virtual machine tnterface 
between the code generated by the COB0L Compiter and the COS0L 
Interpreter. This specification describes the format of COBUSL 
S-instructions and then explains each operator 28s a member cf one 
of the follouing ciasses: 


ARITHMETIC 

DATA MOVEMENT 
BRANCHING 

CONDITIONAL BRANCHING 
MISCELLANEOUS 


RELATED PUBLICATIONS 


TITLE NUMBER 
81706 Systems COBOL Reference Hanualt LOS7i¢97 
Bi1700 COBOL Compiter CP.Se)3 2212 5314 


B1i700 COBOL Compiier Logic CP.Se3 2212 5397 
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S"LANGUAGE PROGRAMS 
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Att COBOL Sw-language programs have associated wHith thems a base 
register and a Limit register. The area cetween the base and the 
limit ts to be used as data space onty. Atl program coder organized 
in segment forms ts stored at any availabie location tn memorye 
according te the memory management algoriiv-1s used by the 81700 
operating system. 


The data space includes a nonmoverlayable erea which contains the 
COP table and various other parameters sith as Edit Hasks and 
Record Areas. 


Various parameterss necessary for the runzing of the SLanguage 
object code and maintained by the MCPs are stored beyond the Limit 
Register tn the Run Structure Nucleus €RSA3- 


A typicat COBOL program tayout tin memory is as fotltlous: 
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& 4 EDIT TABLE (€8 CHRS) t 
& (Sse eer sees ee es seee ees ew eweseef<e—1S) ENTRY €CORX=2) 
* I COP TABLE f 
oe pes $466 ees ee =e eee e eae ee eres F< = PATA SEGMENT ZERO 
al i SPECIAL REGISTERS { * BASE 
® { oon we nw ee nee ween eee enewnnt it 
th t DATANAMNE MONITOR t & 
* g SYMBOLS { & 
# | ee enn 2 we = e+e - f & 
STATIC HEMORY §& EDIT MASKS i & 
- f en nan en nnn een nen ne | . 
% a NONOVERLAYABLE USER?S g DATA SEGMENT ZERO 
* 2 DATA AREA i te 
fe J pow ee we ww enw een cee e nnn en oanan} a 
* ! TRASHCINTERMEOIATE RESULTS) 1} t 
mn § wee mans wae ew ec aseseenewoonen ft * 
& { ALTER TABLE CIF ANY f te 
& Leese asses e ese ee resem ese CaS TACK BASE 
* f STACK jf 
kK SSeS Se See eS ees eee eee F< =—STACK LIVIT 
x § f 
DYNAMEC MEKORY<* § OVERLAYABLE e 
* § USER DATA AREA § 
CIMET REGISTERS ost ees See sor een eee neem eeome PCM EXTENDABLE LIMIT “REG. 
f REINSTAYE INFO ? €BOS AYTRIBUTE) 
g & RUN STRUCTURE g 
a a la aan | 
i DATA DICTIONARY i 
Se Sess reser See eee sees Sess = ft 
! S*CODE { 


FIGURE i-1: COBOL PROGRAH LAYOUT 
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t ADR 1 NAME i PIC i 

PPS ee ae ee eee es 

— O ¢ S¥Wi | 9 CHP ' 

tf =: € 3 {3 { 

tf 7 & SW8 ' 9 CMP ; 

§ 8 & TALLY 46905) CHP $ 

' 13 & DATE CJULITANY $§ 9053 CMP f 

i § <YYDOD> i 5 

f§ 16 & TINE CHHHMSST} 1 9073 CHP Ff 

' 25 %& TODAYS“DATE 1 906) CMP 

i § CMHDDYY) i f 

f§ 32 @ FODAYS*NAME 7 x9) t 


FIGURE 1722 SPECIAL REGISTERS 
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PROGRAM PARAMETERS 


th a) Gt 0.) ON Ome OD OES Ge a GD GD OD OU om aD am oD 


The parameters pertaining to a particular program are listed below. 
The mumber of bits used to contatn the parameter appears in 
parentheses following the parameter name. 

BDOISPBL € 5) BRANCH OISPLACEMENT CONTAINER SIZE +# 1 

OSEGZ (24) BASE OF DATA SEGMENT ZERO 


STACK@POINTER €249 BASE ADDRESS OF STACK 


STACK@SIZE € 59 SIZE OF THE STACK 

COP@BASE (243) BASE ADDRESS OF COP TABLE 

COPB (123 COP ENTRY CONTAINER SIZE 

SEGB € 5) DATA SEGMENT NUMBER CONTAINER SIZE 
DISPB ¢€ 5) DAYA DISPLACEMENT CONTAIRER SIZE 
LENS € 53 DATA LENGTH CONTAINER SIZE 


corXB € 5) COP INDEX CONTAINER SIZE 
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CONTAINER SIZE 


ae ct) om ab a8 OD OD oD 8 @ oO OO we 


Container size 185 a field size Ctn number of bits) necessary to 
contain the maximum value required fer that field. For examptes A 
container size of five bits atlous a field value to house 32 bit 
addresses €0°31).- 
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STINSTRUCTION FORMAT 


EE Gp Gn OP OH EH GH cH eH 7? ep an on Gh Gp GP GP aD CE aD 


Fach CUBOL S~Instruction consists of an Smoperator followed by 
arguments consisting of a varitabie number of bitse The format and 
interpretation of these arguments is specified by the Swoperator 
and is described tn detait by the specification of the individual 
operatorse An exampte of one such instruction format is tllustrated 
below. 


OPi OP2 OPND COPK 
C3) €6) CVARIABLE} CCOPKB3 
RO Gm E>? OD OD LE ER CE Eh Ms Ow OD 2, GE UR OS GH aD OP UD OD aD aS ~aevwaeeun 
£ i 
§ Pe" INOEX INTO COP TABLE 


$ 
fR-"INDEX INTO COP FABLE OR LITERAL 


S@OPERATORS 


hs 1 Ob LR OD OW ON a Ch oe 


The most frequently used S~operators are encoded in a three bit 
S“operator denoted as OPi. If OP1 ts equat to sevens the operator 
is encoded in the next six bits denoted as OP2- If OPI is tess than 
sevens OP2Z is omitted. 


OPND 


An operand is normaity referenced indirectly through ae tabte 
containing the attributes of the operand. An argument which 
references an operand tn this manner is denoted as COPX. An operand 
is either contained In the tInstructton as a titeral or is 
referenced indirectly through the table. An argument of this type 
is denoted as OPND. The first bit of OPND is denoted 2s LITFLG and 
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is used to indicate a literal string or COPX as foltlors: 


f-->f! 1 F LITERAL STRING e 

$ Fes gore eens oe ee ee tee on ee y 
LITFLG--- 

! $m e few mene ener nee eee nwa won 4 

b-->} 0 f COPX 


LITERAL STRING 


When CLITFLG specifies a literate the titerai strings which includes 
the iterat type (LTYPE)s the tLiterat length CLLGTH}» and the 
Literal CLSYMB) ttself in that orders ts tnetuded tn the code 
stream immediately foattowing the LITFiLGe. The format tis as fotlows: 


LTYPE “EiLGTHL LLGFH2 LSYHMB 
(2) (33 (8} (variable) 


Note: LLGTHe present if LLGYHL equat zero 


LTYPE 

O0=Unsigned 4-BIT 

01=Unsigned 8-BIT 

10=Stgned 4-BIT Csiaqn 78s MSD} 
Li=Reserved 


The tength of the literat expressed tn binary tis encoded in LLGTH1 
and tLLGTH2- If the itength of the Literat is Less than eight digits 
or characterss its tength is encoded in LLGYHi? and LLEGTH2 is 
omitted. If the btength of the Literati is greater than or equati to 
eight digits or characterss tits tength is encoded in LLGYH2 and 
LLGTH1L ts set to zeroe The maximum Literal tength *#s 255 digits or 
characters exciuding the signe 
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sea ite Ni OPERAND INDEX C€COPX) 


The argument COPX is an index value used to index into the current 
operand table (COP table). The number of bits C(COPXBd used to index 
into the COP tabte is a function of the maximum number of CGP tabtic 
entries required for the source programe For examples a COP tabie 
consisting of between 512 and 1023 entries would require ten bits. 


The address of an entry is calculated by multiplying the vatue 
“COPX* by the vatue *COPB" and then adding the resuit to the base 
address of the COP tabie. 


A COPX vatue of zero specifies that the COP table information is 
contatned tn=line in the S-Instructtion itself rather than in the 
COP table. €See next section.) 


Notes The base address of the CGP tabie points to an unused 
entry 


IN“LINE COP INFORMATION 


TP UD OE ae OH CR GD ED Gs OD GE OS GE GH OD GD OO 25 G1 GH C2 &, 


The format for intlLine COP information differs from its COP table 
format (CSee “CURRENT OPERAND TABLE™) when subscripting or indexing 
is required. 
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The format for inw=kine COP information is as foliouns: 


> GD BD Ge TO GE GA ED GD GP CD ED SE OD GE GS OF 29 GD GR OD ED) 48 O68 EL GD GE EE OD OD OE ED 2 S&S 4 ED E28 GS DGD CD 45 8 OE CF GE EF O38 ED OG OH OR OD OD O28 &. OE OD oo ah we ae 


DATA ADDRESS DATA SUBSCRIPT-OR= DATA ASCII 
SEG «# DISPL. LENGTH INDEX<FLAG TYPE FLAG 
(SEGB} COISPB) (CLENB? (1) €2) €1) 
NO. OF SUBSCRIPF-FLAG COPXi SUBSCRIPT COPX2 SUBSCRIPT 
SUBSCRIPTS FACTOR 1 FACTOR 2 
CR INDEXES 
(2} C1) (COPXB) CLENS?) CCOPXB) CLENB) 
COPX3 SUBSCRIPT TABLE 
FACTOR 3 BOUND 
(COPXB} ‘CLENB) CDISPB? 
Notes > 
1. None of the subscripting/indexting information Calt entries 


following the ASCII ftag} is present unless the 
subscriptworstndexrflag equals one. 


Ze A COPX for each index vatues or a COPX/subscript factor 
paic fer each subscript vatues must be present as indicated 
by the vatue of number of subscripts or tindexes? 


00 = One 
01 = Two 
10 = Three 
11 = Reserved 
3. COPXi»s COPX2s and COPX3 may be ine-tine entries but must not 


be subscripted cor tndexede 
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CURRENT OPERAND YABLE CCOP) 


SD GR OO GH GD OD 4K GD GE GS EF BR OF OE &P FE OS OF OE C3 G4 GD CH DE OB OD 


The COP table consists of a set of entries» each of which contains 
the attributes of a vartable. The width of one entry 15s a function 
of the source program and is determined by the number of bits 
required to express its attributes (segment numbers displacement» 
Length» subscriptrorwindex-fiage data type and ASCEY flag). 


When the attributes exceed one entry» muliple entries are used ts 
accommodate the additional information. Any reference to 4a multiple 
entry attribute potnts to the first of tts entriecse 


The format of an entry in the COP tabte is as fottlowss: 


J Cen eee ew amen mac waamanaaa (IP hoe wee ene ee ww moemana wsamanmas > | 


DATA ADDRESS DATA SUBSCRIPT“OR= DATA ASCII 

SEG# DISPL. LENGTH INDEX“FLAG TYPE FLAG 

CSEGB)} (CDISPB} ({(LENBD CL) C2} C1) 

NO. OF SUBSCRIPT*FLAG SUBSCRIPF SUBSCRIP¥ SUBSCRIPT TABLE 

SUBSCRIPTS FACTOR 1 FACTOR 2 FACTOR 3 BOUND 

OR INDEXES 

€2) C1) CLENBD CLENB) C(LENB?) CDISPB) 
okt conteelonlentetoad eatateehetetenlenk teeteteeeteteetelettatet, take tebetetetettenl teateketeetetate tated tetaeteatinbetetat telettetontanten 

§ 3 ! { i { i 

§ ! t j i a 

§ SSeS e i § é § 

7 3 d i § i 

i PRESENT IF i PRESENT IF PRESERTYT IF 

§ SUBSCRIPT<“OR@= 5 NUMBER OF f SUBSCRIPT~QR- 

q, INDEX@FLAG { SUBSCRIPTS 1 INDEX"FLAG 

i =] 3 = 01 OR 10 § =1 

00 = i PRESENT IF SUBSCRIPT=- f 

Ol = 2 OR“ INDEX*FLAG = 1 PRESENT IF NUMBER 

10 = 3 OF SUBSCRIPTS = 10 

121 = RESERVED 
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SEGMENT NUMBER 


Segment number +S expressed in binary and specifies the data segment 
number of the operande The container size €SEGB) ts a functi3ion of 
the maximum number of data segments specified in the source 
programe The range of the segment number cuntaitner size (SEGB) is 
0 through 18. If tt 1S zeroes then there is no segment number 
contatner for that particular programs that ospregram has no 
segmented Coverlayabie) data and ali data references are to data 
segment zeros the non-overtayable data segment. 


DISPLACEMENT 


Disptacement tS expressed in binary and specifies the digit 
displacement of the data from the base of the data segment. Alt 
data is stored beginning at an address which modulo 4“BIF must 
equal zero. The container size ¢€DISPB) ts a function of the maximun 
data displacement specified in the source program. The range of the 
displacement container stze (DOISPB) is 1 through 21. 


DATA LCENGTH 


Data tength is expressed tin binary and specifies the number of 
digits or characters tn the data items excluding the signe The 
container size (LENB> is a funetton of the maximum Length specified 
In the source programe The range of the data tength container size 
CLENB)Y ts 2 through 14% howevere the targest data item allowed is 
B8e19t B-BIT units or 162383 4-BIT units. 


DATA TYPE 


a> 2 OA at ah 4 ae Ge oe 


Data type specifies the type of data as fotlows: 
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00 = Unstgned 4~B81IT 

OL = Unsigned 8-BIT 

10 = Signed 4-BIT Csign ts MSD) 

11 = 


Signed 8-BIT Csign over MSDY 


SUBSCRIPT“OR@WINDEX“FLAG 


The subseritptrorwindex-flag bit tis true to indicate subscripting or 
indexing and faise otherwisee When true the next entry(s) contains 
the necessary subscripting or indexing informatione 


NUMBER OF SUBSCRIPTS OR INDEXES 


When indexing or subscripting is indicated by the subscript-or- 
index~ftadg» the number of subscrisnts cr indexes required for the 
variabie ts specified as foltows: 


00 = One 

Oi = Tuo 

10 = Three 

il = Reserved 


The bit immediately following this fietd indtcates the appropriate 
operation: indexing or subscriptinge 


0 
1 


Index 
Subscript 


fi 


SUBSCRIPT FACTORS 


Subscripting requires one to three fieidsre LENB bits in Lengths 
containing the binary factor by which each subscript value ts to be 
muitiptlied to obtain the proper digit address. The factor is the 
digit displacement between elements cf the table. The vatue one is 
subtracted from the subcript vatue prior to muitiptyting by the 
factor. The subscript value may be signed. 
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If the subscript value 1S zero or negatives or if the finati sum of 
the multiplied subscrinot values exceeds the table bounds an error 
communicate wilt be tssued. 


If the binary equivalent of the multiplied subscript vatue or the 
sum of the multiptted subscrtpt values exceeds 24 bits» overftow is 
ignored. 


A COPX for each subscript vatue immediately follows the primary COPX 
in the S-Instructione A subscript variable must: not itself be 
subscripted or indexed. 


Note: Literat subscript vatues are optimized by the compiter by 
buiiding @ new descriptor inetine tin the S-Instcructione 


INDEXING 


Khen tndextng tS indicated» a COPX for each index vatue (Cup te 
three) immediatety fottows the primary COPX in the SInstruction. 
An index vartable must not itself be indexed or subscripted. 


An index value 3s contained in a 28 BIT fietd. The value consists of 
a 4=-BIT sign followed by six 4-BIT decimat digitse The value is 
converted to binary and combined with the binary data address at 
execution timee 


If any tndex vatue ts tess than zero or if the sum of the index 
vatues exceeds the table bounds an error conmunicate wttt be 
issued. 


TABLE 8O0UND 


C8e 6h Hh) GD OD ae Uh a OD at an 


Table bound 1s a binary vatue used to specify the maximun 
permissibte digit displacement from a table base for subscripting 
and indexing. Its container size is DISPB. 
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ASCII FLAG 


The ASCTI! flag bit of the destination field infituences the execution 
of certain code sensitive Slanguage instructions. These 


instructions are: 


ADD MVA CAT CMPA 
9 UB MVS SHVRN CHPS 
INC MV N MVT 

DEC MVZ 

IkCi 

DEC1 

DIV 

DIVS 


The ASCII flag bit does not influence the execution of the faolloving 
code sensittve instructions in which EBCDIC is assumed: 


EDIT MICF 
EDTE MICE 
CHKPC 
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INSTRUCTION SET 


ARITHMETIC. 

NAME MNEMONIC QP ARGUMENTS 
INCRENERT INC 02 OPNDOL» COPXI 

ADD ADD 08 OPNDis COPXis COPX2 
DECREMENT DEC 03 OPNDLs COPX1 
SUBTRACT SUB 190 OPNDis OPND2s COPX1 
MULTIPLY MULT Li OPNDLis COPX1» COPX2 
DIVIDE DIV 12 OPNDis COPXis COPX2 
DIVIDE SPECTAL DIVS 16 OPNDis COPXi» COPX2 
INCRENENT BY ONE INCI i3 COPX1 

DECREMENT BY ONE DEC 14 COPX!1 

DATA MOVEMENT 

NAME MNEMONIC OP ARGUMENTS 

MOVE ALPHANUMERIC MVA 00 OPNDI» COPX1 

MOVE SPACES FVS 15 COPX1 

MOVE NUMERIC MVN 01 OPNDi»s COPX1 


MOVE ZEROS MVZ 22 COPXI 
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CONCATENATE CAT 32 Nx COPX1s OPNDOeccer 
OPNON 

SCALED MOVE NUMERIC SMVN 28 OPNDis COPXis Ve SCL 

EXAMINE EXAH && Ms Ts COPX1is OPNDIis 


COPX2e OPND2 


MOVE TRANSLATE MVT 47 OPNDi»s COPX1is COPX2 
EDIT EDIT i? OPNDis COPXis DADDR 
EDIT WITH EXPLICIT MASK EOTE 23 OPNDis COPXis MASK 
MICR FORMAT MICF 48 COPXis COPX2 

MICR EDIT MICE | £9 COPX1is COPX2» COPX3 
BRANCHING 

NAHE MNEMONIC OP ARGUMENTS 
BRANCH ON OVERFLOW BOFL 23 Vs BADDR 

SET OVERFLOW SOFL 07 V 

BRANCH UNCONDITICNALLY BUN 03 BADDR 

PERFORH ENTER PERF 06 K» BADDR 

PERFORM EXIT PXIT 3% K 

ENTER NTR 16 | BADDR 

EXIT XIT 19 

GO TO DEPENDING GOTD 39 COPX1is Le DBADDROe.ce» 


DBADDRL 
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ALTERED GO TO PARAGRAPH GPAR 35 DADDR 

ALTER ALTR 36 DACDR»e ACON 


CONDITIONAL BRANCHING 


28 yom om ae ee om CH Om an GF Os oD GD 6B & Gm on 62 oF SS 


NAME MNEMONIC GP ARGUHENTS 

COMPARE ALPHANUMERIC CMPA 04 OPNDis COPXi»s Re» 
BADOR 

COMPARE NUMERIC CMPN 05 OPNDi» COPX1s Re 
BADDR 

COMPARE FOR ZEROS CMPZ 2f COPXKis R» BADDR 

CONPARE FOR SPACES CMPS 37 COPX1s Re BADDR 

COHPARE FOR CLASS CMPC 38 COPX1is Cr BADOR 

COMPARE REPEAT CMPR 45 OPNDi»s COPXI» Re» 
BADDOR 

MISCELLANEOUS 

NAME MNEMONEC OP ARGUMENTS 

COMMUNICATE COMM 33 COPX1 


LOAD COMMUNICATE REPLY LOCR 41 DADOR 


BURROUGHS CORPORATION 
COMPUTER SYSTEMS GROUP 
SANTA BARBARA PLANT 
CONVERT 

MAKE PRESENT 


HARDWARE MONITOR 


CONV 
MAKP 


HMON 


40 


42 


43 
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ARITHMETIC CPERANDS AND INSTRUCTIONS 


In generals arithmetic operands can have any of the _ foltorinag 
formats: 


1. Unstgned 4°B8IT 

2e Ursigned 8-sIT 

3. Signed &4°BIT Csign ts MSD) 
&e Signed 8-BIT Csign over MSD) 


Any restrictions concerning the types of operands permitted in an 
operation are specified under the description of the particular 
operation. 


ALL fietds are addressed by pointing to the most significant bit of 
the most significant units which in the case of a signed field is 
the signe 


ALt fieids are considered to be comprised of decimat integers. 
The absclute vatue is stored if the receiving fieid is unsigned. 
Unsigned fietds are considered positive. 


Khen staned format is specified for the receiving field for any 
arithmettc operations the sign postition ts set to 21100 for 4a 
positive result ang to 1101 fer a negative result. 


4-BIY operands are interpreted in units of four bitse Khen a signed 
operand is specifieds the stqn ts interpreted as a separate and 
leading Cteftmost) 4-BIT unit which is not inctuded in the 
statement of lengthe 


B-BIT operands are interpreted tin units of eight bitse When a signed 
operand is specifteds the sign is interpreted as being contained in 
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the Leftmost four bits of the leftmost 8-BIT unit. 


The tength of the operand field spectfies the number of 4-BIT or 
B-BIT unitse 


When &8-BIT units are specified for the receiving fieid of an 
arithmetic operations the leftmost four bits of each 8"*8IF units 
except the unit carrying a Signe is set to 1111 1f EBCDIC or ta 
0011 if ASCII« 


The vatue of an 8~BIT unit is carried tn the rightnost four bits of 
the unite Its value is as defined below for the 4=BIT unit. The 
teftmost four bits» except for a signs are ignorede The value and 
Sign interpretation of a 4-BIT unit is as follows? 


UNIT VALUE SIGN 
0000 0 + 
0001 i + 
0010 2 + 
0011 3 + 
0100 4 + 
0101 5 + 
0110 6 + 
0111 7 + 
1000 8 $ 
1001 9 + 
1010 ‘UNDEFINED + 
1011 UNDEFINED + 
1100 UNDEFINED & 
1101 UNDEFINED - 
1110 UNDEFINED + 
11i1 UNDEFINED + 


In addition and subtractionr results generated when the size of the 
result field is not sufftcient to contain the result are not 
spectfied. then the resutt fieid is tonger than the length of the 
resuits leading zero units are stored. 


In three address add» three address subtract and in multiplys total 
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or partial overlap of the first two operands is permitted. Resutts 
generated when the result fieid totality or partiatly overlaps 
either of the operand fieids are not specified. 


In two address add ang subtracts totat overlap is permittede Results 
generated when the resuit fiteld partiality overlaps the first 
operand fieid are not specified. Note that total overtap inptlies 
that the two fitetds are tdentical. 


No overlap of operands or result fields its permitted in divide. 
Results generated uncer any condition cf overtap are not specified. 
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ADD YHREE ADORESS 


RXeeEEk&NS 


# ADD * 


kerri 


Format: 


EKEKAEEEARARERAKHRERARAREKARAEKEEARY 


* ADD OPNDi»s COPX1s» COPX2 « 


HARKER ERAaARKCKEREREEERAEeKEEKE 


Functton: 


Aigebraicatiy add an addend denscted by OPND1 tc an 
augend denoted by COPXKi and store the sum in the field 
denoted by COPXK2. 


BURROUGHS CORPORATION 
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SUBTRACT THREE ADDRESS 


Format: 


RAEAEKRAEKAKERAERERRKRAKRARARKAEEAKH 


* SUB OPNDi»s OPND2»s COPX1i * 


KRAKAUER EEREKAEARKERRKXE 


Function: 


Algebraicattly 


from a 


a 
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KaE&RKEKKR 


* SUB * 


ReeKKEKKE 


subtract a subtrahend denoted by OPND1 


OPND2 and store the 


difference in the field denoted by COPXi. 
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ADD TKO ADDRESS 


Format: 


RAEKREKEEREARRERARTERT 


* INC OPNDi»s COPX1 * 


RERARREKKREKREKEERAREERKK 


Funct icon: 


Aigebraicaily 
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kakenkeerxe 


* INC * 


REKKXKRKEE 


add an addend denoted by QOPNDL to an 


augend denoted by COPX1 and store the sum in the fieid 


denoted by COPXi. 
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SUBTRACT TWO ADDRESS 


RKEERERKERRAERRERKEKRRK 


x DEC OPNDis COPX1 * 


KREMER REREREEEERRERRE 


Function: 


Atgebraicatly 


from a 
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WRKEKKS 


* DEC * 


KFaeeakenr 


subtract a subtrahend denoted by OPNDI 


COPXi and store the 


difference tn the field denoted by COPX1. 
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MULTIPLY 


Format: 


KeAaKENKEK 


* MULT * 


RRKaERKEREEE 


RRRAEAEAEAEKAKAKRKEREREEREKERERE 


® MULT OPND1»s COPXis COPX2 * 


RHRARRKERREREKARAKREARAKRAEKEEKK EERE 


Functton: 


Aigebraicatty muitipty a multiplicand denoted by COPX1 
by a multiplier denoted by OPNDi and store the product 
tn the field denoted by COPX2. 


The resutt field tength is the sum of the Lengths of 
the tuo operands and must be denoted by COPX2- 


The result field will atways be either signed 4=8I1T 
format ofr unsigned 4&4 7*BIT format. 
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DIVIDE 


Formats 


eEeNRaARY 


* DIV * 


k&aeRraen tr 


KECK EKKAREARREARKECENHERAERRNEBE 


* DIV OPNDIi» COPX1» COPX2 * 


KREKKRRREKAEKEAEAEECREEKAKAERE REN 


Funct ions 


Algebraicaily divide a dividend denoted by CUPX! by 2 
divisor denoted by OPND1 and store the quotient in the 
fietd denoted by COPX2. Store the remainder in the 
fieid denoted by COPXI1. 


The resutt fieid length is the difference of the 
lengths of the two operands and must be denoted by 


~COPX2. 


Results are not spectfied if the length of the 
dividend is not greater than the tenth of the divisor. 


If the absolute vatue of the divisor Is not greater 
than the absolute value of an equivatent number of 
leading digits of the dividends the result is 


undefined. 


Division by zero resutts in a fatal error communicate 
to the MCP. 
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The sign of the remainder ts that of the originat 
dividend. 


The dividend field wilt aiways be either signed 4-BIT 
format or unsigned 4“BIT format. 
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OIVIDE SPECIAL 


Format: 


RK&KKKKKK 


* DIVS *# 


EHARAeKARR 


BAKKE HKKEKEEEKRAEREKCKKREREAKAEELR 


* DIVS OPNDi»s COPXis COPK2 * 


RHREKREKEEKREREARREAKERKREKAAREKRH 


Functtons 


This operation is performed in exactly the Same manner 
as the standard divide (DIV) operatcrs except that 
when a divisor equal to zero %S encountereds = an 
overflow toggle is set and processing is altowed to 
continue. The overflow toggie can be mantpulated by 
the *"SOFL™ and “BOFL” Swcperatorse 
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INCREMENT BY ONE 


Format: 


EERE RREKENKAK KK 


* INCL COPXL * 


RARE MHAREREEKRAR 


Funct tons 


Aigebraicaily 


add the 


positive 
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KEKEKRKKE TR 


* INCI «# 


KRaeEKKKNE 


integer one to. an 


augend denoted by COPX1 and store the sum in the fietd 
specified by COPX1. 
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DECREMENT BY ONE 


Formats 


HREENRSEEKERAEKR 


* DECI COPX1I * 


ReRERERRERATHR 


Funct ton: 


Algebraicaily 
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KWVKEARE 


* DECI * 


Ree khk ike 


Subtract the positive integer one  fronr 


a minuend dencted by COPX41 and store the difference in 


the fieid specified by COPXi- 
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DATA MOVEMENT OPERANDS AND INSTRUCTIONS 


In generais fietds involved in data movement operations can have any 
of the fottowing formats: 


L- Unsigned 4~-B1IT 

2e jUnsigned 8-BIT 

3. Signed 4-S8IT Csign is MSD) 
4e Signed S"BIT €sign over NSD) 


Any restrictions as to the type of fteids permitted tn an operaticr 
are specified under the description of the particular cperation, 


See arithmetic operands and instructions for a description of th 
four types of fields. 


Totaltty or partiatty overtapped fieitds are not permitteds untess 
specificaily specified by the description of the individuat 
instruction. 
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MOVE ALPHANUHERIC 


Format: 


ZEawrnaese 


* MVA * 


RRKRKR KE IE 


RARER KAAEAAAAREEEEK 


* MVA OPNDi» COPXL * 


RRA RARRERKEREAKRAKRRRERK 


Funct ions 


Move 8=BIT er 4&*BIY units from the source field 
denoted by OPNDi to the 8=BIT or 4=-BIT destination 
field denotec by COPXi.« 


If the destination field ts siqneds it receives either 
the sign of the source tf the source 5S sSigneds or 
1100 if the source #8 unsigned. 


If the data type of the source field is 4=BIT and the 
data type of the destinatton fiteld ts @8"BITr each 
&@-BIT unit is moved to the destination with 1111 if 
EBCDIC or OOL1 if ASCII moved to the teftmost four 
bits of each 8-BIT unite 


If the data type of the source field is &8-BIT and the 
data type of the destination ts 4°81Te the rightmost 
four bits are moveda 


If the data type of the source fieid is the same as 


the data tyne of the destinatton fielde each unit is 
moved unchanged to the desttnation. 
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If the destination length is greater in size than the 
source lengths the destination fietd ts filled tn on 
the right with trailing spaces €0100 0000 tf EBCDIC or 
0010 0000 tf ASCII) if the destination type is &"8IT; 
otherwise tt is fitilted in on the right with zeros 
€0000). 


If the destination tength is tesser in size than the 
source tlengths the source data ts truncated on the 
right. 


Overlapping operand fietds are permitted if the data 
type of both fields ts the samee It can be assumed 
that the source is moved 24 bits €six dtgits or three 
characters)? at atime into the destination field and 
that the move is from teft to right. 


BURROUGHS CORPORATION 
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MOVE SPACES 


Formats 


SeEKRKEKRKEKRARKE 


* MVS COPXL * 


RAERRKERERKRKEKE 


Functions 


Fitt the destination 
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Ruk&kerenae 


2 MVS * 


&RALUEKL 


denoted by COPXi with 


spaces (0100 0000 if EBCDIC or 0010 0000 if ASCII}. 


The data type of the destination field ts tgnored and 


7s assumed to be unstgned 8-BIT. 
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HOVE NUMERIC 


Format: 


KARAEGKeKKX 


* MVN ® 


RARE EEAE 


KCMRRaEMEEKARAEEAKREREKAKE 


*# MVN OPNDi» COPX1i * 


REARRAKKEREKKEKKERRERKE 


Functions: 


Move &8-BIT or 4-BIT units from the source field 
denoted by OGPNDi to the 8-BIT or 4&4=BIT destination 
fietd denoted by COPX1. 


If the destination fietd is signeds it receives either 
the sign of the source if the source is sitgneds or 
1100 if the source is unsigned. 


If the destination field ts unstgneds the sign of the 
source 15 ignored. 


Tf the data type of the destination fieid is 8&=-BITs 
the teftmost four bits cf each 8-BIT units except for 
the sign positions if signeds are set ta 1111 if 
EBCDIC or to 0011 if ASCII» regardless of the data 
type ef the source field. 


tf the data type of the destination fietd is 4-BITs 
the tleftmost four bits of each source 8"BIT unit are 
ignored and only the rightmost four bits are moved; if 
the source field is a 4*BIT fietd» each 4-BIT unit is 
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moved unchangede 


If the destination length is greater tin size than the 
source lengths the destination field is filled in on 
the teft with Leading zeros of appropriate type (1111 
0000 if EBCDICs O01! 0000 if ASCII or 0000 1€ 4-BIT}. 


If the destination length is lesser tn size than the 
source Lengths the source data 15 truncated onthe 
teft. 


Note that a sign is placed in the teftmost four bits 
of a fields whether 4-BIT or &-BIT. 


Overtapping operand fieids are permitted if the data 
type of both fields is the samee It can be assumed 
that the scurce is moved 24 bits €six digits or three 
characters) at a ttme tnto the destination field and 
that the move ts from left to right. 


BURROUGHS CORPORATION 
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MOVE ZEROS 


Format: 


ReEKEKEEEK 


* MVZ * 


GkeeEeKKNT 


RREREKCARKRERKY 


* HYZ COPXL * 


KRAREKEAEEKERAAEEKE 


Functions 


FILtl the destination fietd denoted by COPX1 with zeros 
of the appreprtate type €1111 0000 tf EBCDICs» oO011 
0000 if ASCII or 0000 if 4-BIT})- 


If the destination fieid is stgneds 1100 is placed 
into the sign posititone 
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CONCATENATE 
ReEkEAKRKK 
* CAT * 


Formats 


RERAERAK 


REKRKREAKAERKAE RARER Ra EREAK BEEK 


* CAT No» 


COPXis DOPNDOe>e woes OPNDN * 


REECE EKEAKEKARARKRAERERRERKARHEEKRERREE 


Funct tons 


Move each of the Ntl fteids denoted by OPNDO through 


 CGPNDNs tin the order specifiteds tnto an output string 


starting at the field denoted by COPX1.« 


The number of source fieids is specified by the 4-BIT 
binary vaiue Ne The value N ranging from 0000 to 1111 
is used to indicated 1 to 16 source fieids. 


Each fietd is moved according to the rutes specified 
for MOVE ALPHANUMERIC. 


If the destination iength ts greater tin size than the 
combined source lengths the destination fietd is 
filled in on the right with trailing spaces (0100 0000 
if EBCDIC or 00610 0000 if ASCII)- 


If the destination length is lesser in size than the 
combined source Lengths» the source data is truncated 
on the right. 
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xy 
oi 
SCALED MOVE NUMERIC - 
K&e&weKEEK 
& SMYN * 


wey 
y” 
wee ” 


Format: aes 


WHKEEAKKRKEEWEERERERKEKEAKEW ERERKE 


* SMVN OPND1s COPXi» Ve SCL « a e 
KEE AAAREEKCAEARAEERRERKSEUIEEAERKEK ye S 
el 
u~ \ S) 
oe yh 
Function: eo op & 


Zo 
If V equais 0s perform a MOVE NUMERIC oneration after 
first adcing the scate factor to the ficid tength of 
the source fietd and assuming that the added portison 
of the fietd is zeros on the riqhte The scate factor 
Bust not be greater than Che destination field length. 


Yf V equals ones perform a HOVE NUMERIC operatian 
\ after first subteacting the scate factor from the 
fietd tength of the source fietd. The scate factor 
must not be greater than the source fireid tength. 


Att rules specified for MOVE NUMERIC are applicable 
after adjustment by the scale factor. 


The contatner stze for the scale factor is the same as 
the container size for the length of an operand 
CLENB}. The tength of V ts one bite 
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MOVE TRANSLATE 


Format: 


RRRKAKE 


a MVT * 


KAaREKRKERSX 


RERKEKEKKARKEKEEKREKRERKAAKEARRERE 


* MVT OPNDis COPXi»s COPX2 * 


KeKREKEKRAKEKEKKAKREREKRRAEREKR EEK 


Function: 


Move 8-BIY units from the source fieid denoted by 
GPND1 to the destination fieitd denoted by COPXK2» 
translating enroute. 


Transtatiton ts accomplished by ustng each 8<BIT source 
characters multiplied by eights» as an index into the 
transtation tables denoted by COPX1ls $ta obtain the 
transtiated character. 


The data type of the source and table fields are 
ignored and are assumed to be unsigned 8-"BIT. The 
destination fietd is also assumed to be unsigneds but 
may be 47BIT or 8&-BIT. 


If the destination length is greater in size than the 
source lengths the destination fietd is fitted in on 
the right with trailing spaces €0100 0000 if EBCDIC>» 
0010 0000 if ASCII or 0000 if 4-BIT}. 


If the destination length ts tesser is size than the 
source tengths the source data is truncated on the 
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righte 


Totati overlap of operand 
tnplace transiation. 
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fieids ts permitted to allow 
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EXAMINE 


Format: 


KRKAXRKNRKK 


* EXAM * 


KRREEREKE 


WRKEKCKEKEBHAREWAKARREEAKEKRAAKCEENAREKENRAEREEEK 


* EXAM Me Ts 


COPXi» OPNDie COPX2s OPND2 «* 


RECKAERAKARKKEREARKKAEERKRBAAREAEECEREKEAHEEREADRALG 


Funct ions 


Examtne the operand defined by COPX1» tattying and/or 
replacing a variabie nunber of 8-BIT characters. The 
particular 8-BIY character to be tatlied and/er 
replaced 1s specified by OQPNDi. The character to be 
used as the replacement character is specified by 
OPND2. The field into which the taliy itis stored is 
specifted by COPX2. 


The type of operation is specified by the 4=B8IT 
Darameters Te If these four hits are tdentifteds» tleft 
to right» as Tis T¥2» T3 and Ts then ¥ is interpreted 
as follows: . 


TLT2 = 00 undefined 
O1 tatly T3¥4 occurrences of the character 
specified by OPNDi 
10 replace T3T4 occurrences et the character 
specified by GPND1 
Zi taity and replace YT3T& occurrences of the 
character specified by OPNDIL 
T3T4 = 00 alt 


01 Call) leading 
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10 untit first 
1i first 


NOTE: TLF2T3¥& = OL11 and 1111 not specified and 
results are undefinede 


The OPND2 argument is not present when TIT2 O1. 


The COPX2 argument is not present when TLT¥2 10. 


The data type of the examined operand (C(COPX1)? is 
assumed to be signed or unsigned S&-BIT. If tt is 
Sigqnede then the originat sign wilt be preserved by 
this operation. 


The data type of the examining operands deftned by 
OPNDis must be unsignede Its tength 18S assumed ta be 
One o yhen 4°BIT format is specifieds the cverand is 
assumed to have the four bits 1111 tf EBCDIC or OQ011 
tf ASCII appended to the teft. 


The data type of the replactng operands defined by 
OPNO2s must be unsigned. Its tenaqth ts assumed to be 
onee When 4~-BIT format is specifieds the leftmost four 
bits of the position replaced are set to Liti tf 
EBCDIC ofr 0011 if ASCII» and the rightmost four bits 
receive the four bits from the replacing sourcee When 
B8-BIT format is specified» the positicn reptaced 
receives alt eight bits from the reptacing sourcee 


The data type of the tatly fietd defined by COPX2 is 
assumed to be unsigned &~-BIT.« Its Length is assumed to 
be fivee 


If the one bit parameter M equals zeros» it denotes 
numeric items» and onty the rightmost four bits of a 
character are used tn the comparisons the leftmost 
four bits are ignored. If M equals ones atphanumeric 
items are denotede and all eight bits of a character 
are used in comparing. 
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EDIT INSTRUCTIONS AND EDIT MICRO-OPERATORS 


2 aD GP Gb Gt GE GP GR GE GE GD GP OF Ge SP ED OF GD ED OD & CB GS GR GE Gb 42 68 GR GE C3 GE G® GD GE GG? @ CH Ch GD GD OD 


No restrictions are ptaced on the data type of the source fieid of 
an edit operation. 


The data type of the destination fteld cf an edit operation must be 
unsigned &~BIT. 


If the destination length is greater in size than the source length» 
the source data is assumed to have leading zero fitt on the left. 


If the destination length is tesser in size than the source iengt hs 
the source data is truncated on the left. 


The operation 1s terminated by an edtt micromoperator and not by 
exhaustion of etther the source or destination fields. 
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EDIT 


Formats 


Rekk&RKKKKK 


* EDIT * 


Saekekkknank 


K&R KAA KARATE AEHEAREAH KEK ARK 


* EXIT OPND1i»s COPX1i»s DADDR * 


MMREEAKRERRHEEEEA RAE RENRAKKARSE 


Function? 


Meve data from the source fields denoted by OPNDis to 
the destination fields denoted by COPXis under the 
control of the micro~operator string contained at the 
Location denoted by the DADDR. 


The argument DADDR is an unsigned binary value which 
spectfies the digit displacement of the micro-moperator 
string retative to the data segment zero basee Tthe 
container size of DADDR ts DISPB. 
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EDIT WiFH EXPLICIY MASK 


Format: 


RERERKAKAK 


* EDTE * 


REEKRARAER 


RRA CKAEAARKEEKEEKEKEKEAKEEERE 


* EDTE OPNDIis COPXis MASK * 


REKKMAEAREEEKEKAEKKAKEEREEE EHR 


Funct ions 


Move data from the source fieid denoted by OPND! 
the destination field denoted by COPX1 under 


control of the micro~operator string immediately 
following COPXi. The format of the explicit 
microwoperator string is the same as a literal and is 


as fotlous: 


LTYPE LLGTHI LLEGTH2 MICRO-OPERATOR STRING 


C2) €3) (8) Cvaritabte) 

SEM CMR wma Lemme Come wows cw em ewe an 
f t § 
7 i 
f 3 Present if LLGTH equats zero 
i i 
— Length of the microroperator string in 
f 68-BIT units. If tength is greater than or 
$ equati toe eight unttse the tength is encoded 
t tn LLGTH2 and LLGTH 1 is set to zero. 

me | 

O01: Unsigned 8-B8IT format 
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EDIT MICRO“OPERATORS 
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The edit microtoperators used in an edit tnstruction ares: 


OPERATOR MNEMONIC OPERATION 

0000 R MYO MOVE DIGITS 

0001 R HVC MOVE CHARACTERS 

0010 R MVS MOVE SUPPRESS 

0012 R FIL FILL SUPPRESS 

01c0O N SRB SKIP REVERSE DESTINATION 
0101 Tf INU INSERT UNCONDITIONALLY 
0110 7 INM INSERT ON MINUS 

O111 T INS INSERT SUPPRESS 

1000 fT INF INSERT FLOAT 

100% T EFM END FLOAT MODE 

1010 0000 ENZ END NONZERO 

1010 0001 EOM END OF MASK 

1010 0010 3Z5 START ZERO SUPPRESS 

1010 OO1f CCP COMPLEMENT CHECK PROTECT 
OTHERS UNDEFINED 


"R® gndicates 2 4*BIT binary value used as a repeat count. The vatue 


0000 represents vo repeats 


"N® indicates a 4&4°BIT binary value used to skip over a 


do tt once. 


number of 


destination 8-BIT units. The vaiue C000 represents no skip. 


"T" indicates a 4*BIT binary watue uhich is? 


1} usec to index into a table of editing constants 
2) used to tndicate a conditicnal selection between 


tuo table constants 
3} used to tndicate an editing constant in tine 
with the editwroperator string. 


The next edit-cperator follows the constant. 
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The following table indicates the normal table editing constants as 
well as the conditional and unconditionai selection of constants 
assoctated with the value “Tf*. 


EDIFING CONSTARTS 


T TABLE ENTRY MNEMORIC UNCONDITIONAL OR 
EBCDIC CONDITIONAL CONSTANT 

0000 a oid PLU 

0001 = MIN 

0010 bile i | AST 

0011 "eo DPT 

01200 sai td CMA 

0101 “<™ CUR 

0110 be 4 a ZRO 

0111 = oN, BLK 

1000 SPM EITHER ENTRY O CR 2 
100% SBM FITHER ENTRY 7 GR 1 
1010 LIT IN“LIWNE 8-BIT CONSTANT 


Associated with the edit instructions are three toggies denoted as 
"Ss? for siane “Z"* for zero suppress and “"P" for check protecte 
Initially the *Z*" and the "“P*" toggles are assumed to be set to the 
zero state. They are set and reset as specified by the description 
of the individual micro~moperators. The “"S" toggle is set to zero if 
the source fietd sign is positive and to one otherwisee Unsigned 
fields are considered positive. 


The EDIT HICRO@“OPERATORS are explained individuatty in the folloning 
sect ione | 


MOVE DIGI¥ 


Set "Z" to "1"%»s ending the zero suppress statee Move an appropriate 
unit C4-BIT digit or &8-BIT character) from the source field to the 
destination fieide If a 4"BIT unit !s moved» append the four bits 
11l1i to the left before storing in the destinatton. If an S8-BIT 
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unit is moved» the four bits 1111 are substituted for the leftmost 
four bits of the 8&-BIT unite 


MOVE CHARACTER 


2 a6 Gb aw @ 4b @& GF Gh 28 Gs oe a a 


Set "7" to "1%s ending the zero suppress Sstatee Move an appropriate 
unit C4"BIT digit or 8&"-BIT character) from the source field ta the 
destination field. If a 4“BIT unit 1s moveds append the four bits 
11121 to the teft before storing tin the destinatione If an 8~-BIT 
unit is moveds tt is moved unchanged. 


MOVE SUPPRESS 


The micro~operator "MOVE DIGIT™ is performed if the 4°BIT units or 
the rightmost four bits of the 8B8=BIT untts of the source field is 
not equal te o000- 


If the appropriate four bits of the source fieid unit are equat to 
0000- the suppress toggle “7" is inspected. If "2% equals “1"» 
indicating non=suppress modes the microwoperator “MOVE DIGIT” is 
performed. If the suppress toggle "Z" equats *0%» the check protect 
toggte *P™ ts inspected. If "P"” = "0". tndicatina nonwcheck protect 
modes move the tabte entry containing the 8-BIT code for blank to 
the destination fieitd. If "P" = “"“i"» move the table entry 
containing the B8-BIT code for asterisk to the destination field. 


SUMMARY 
SOURCE NOY = OG MOVE DIGIT 
Z=1 SOURCE = 0 MBVE DIGIT 
Z=0 P=0 SOURCE = G6 MOVE TABLE ENTRY 7 CBLANK) 
Z=0 P=1 SOURCE = 0 MOVE TABLE ENTRY @ CASTERISK) 
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FILL SUPPRESS 


Gh aS GP v;, 1 an GY GR GD a 4D a 


If "P* = "0", tndicating non~check protect moder move the tabie 
entry containing the 8“8IT code for blank to the destination fteld. 
If "p* = "1", move the table entry containing the 68"-B8IT code for 
asterisk to the destination field. 


SUMMARY 
P = 0 MOVE TABLE ENTRY @ CBLANK) 
P= 4 MOVE TAGLE ENTRY 2 CASTERISK) 


SKIP REVERSE DESTINATION 


Adjust the address pointer of the destination field to skip backxard 
(Lower address} "N™ 8-BIT units. 


INSERT UNCONDITIONALLY 


a GE Gr Ob CR Gt ED GP GDP UD GP ER OO CT 4D GU 49 OOOH OR 


Move the tabte entry “T" as indicated below to the destination 
fietd. 


T=O0eec? MOVE TABLE ENTRY Tf 
S=0 T=8 MOVE TABLE ENTRY O CPLUS}) 
S=1 T=8 MOVE TABLE ENTRY 1 CMINUS) 
$=0 T=9 MOVE TABLE ENTRY 7 CBLANK) 
S=1 T=9 MOVE TABLE ENFRY 1 CMINUS) 
T=10 MOVE IN“LINE TABLE ENTRY 


INSERT ON MINUS 
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Move the table entry "°F" as itndicated below to the destination 
field. 


S=1 T=O0 eee? MOVE YTASBLE ENTRY T 

*& P=0 MOVE TABLE ENTRY 7 CBLANK?} 

* p=} MOVE TASLE ENTRY 2 CASTERISK) 

S=1 T=8 MOVE TABLE ENTRY £ CMINUS} 

S=1 T=9 MOVE TABLE ENTRY L CHINUS) 

S=1 T=10 MOVE IN-LINE TABLE ENTRY 

*: § = 0 or only source digits/characters equat to zero (minus zero) 


have been movede 


INSERT SUPPRESS 


Move the table entry “T™" as indicated betow to the destination fieid. 


Z=1 T=Occeel? MOVE TABLE ENTRY T 

Z=Q0 P=0 MOVE TABLE ENTRY 7 CBLANK) 
Z=O P=1 MOVE TABLE ENTRY 2 CASTERISK) 
Z=1 $=0 T=8 MOVE TABLE ENTRY O CPLUS}) 

Z=1 S=1 T=8 MOVE TABLE ENTRY 12 CHMINUS3 
Z=1 S$=0 T=9 HOVE TABLE ENTRY 7 CBLANK} 
Z=1 S=1 T=9 MOVE TABLE ENTRY 1 {MINUS3 
Z=1 T=10 MOVE INwWLINE FABLE ENTRY 


INSERT FLOAT 


Move the tabte entry “T" and/or perform the micre-operator "HOVE 
DIGIT™ as tndtcated below. 


Z=1 MOVE DIGIT 

Z=Q SOURCE =0. P=0 MOVE TABLE ENFRY 7 CBLANK) 

Z=0 SOURCE =0 P=} MOVE TABLE ENTRY 2 CASTERISKH) 

Z=0 SOURCE NOT=0 T=0e~47 MOVE TABLE ENTRY THEN MOVE DIGIT 

Z=0 SOURCE NOT=0 T=8 S=0 MOVE TABLE ENTRY CPLUS? THEN MOVE DIGIT 
Z=0 SOURCE NOT=G6 T=8 S=1 MOVE TABLE ENTRY : C MINUS? THEN MOVE DIGIT 
Z=0 SOURCE NOT=0 ¥=9 S=9 MOVE TABLE ENTRY 7 CBLANK) THEN MOVE DIGIT 
Z=0 SOURCE NOT=0 T=9 S=1 MOVE TABLE ENTRY 1 CMINUS) THEN MOVE DIGIT 
Z=0 SOURCE NOT=0 T=10 MOVE IN-LINE TABLE ENTRY» THEN MOVE OIGIT 
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Move the tabke entry "TIT" as indicated below to the desttnation 
field. 


Z=0 T=0 ceo? MOVE TABLE ENTRY 7 

Z=Q 5$=0 T=8 MOVE TABLE ENTRY O CPLUS) 
Z=0 S=i T=8 MOVE TABLE ENTRY 1 CMINUS} 
Z=0 S=0 T=3 MOVE TABLE ENTRY 7 CBLANK) 
Z=0 $=1 t=9 MOVE TABLE ENTRY 1 CMINUS) 
Z=0 T=10 MOVE IN“LINE TABLE ENTRY 
Z=1 NO OPERATION 


END NONZERO 


Terminate the micro~operator operations if any nonzero source 
character/digit has been moved; otherwise continue With the next 
in-line operatore 


END OF MASK 


Terminate the micro~cperator operations. 


STARE ZERO SUPPRESS 


> Gh OR CD 4 Gb OE Gy GE UE Gh Gh OK 4D CH GD GD OD ee 


Set *Z™* to the “0O" state. 


COMPLEMENT CHECK PROTECT 


2 om Gb ae 66 ae Gn ab a Gb OS Gh GE GE UO GE OP GR Ge 8 GF GG a a 
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Complement the state of “"P". 
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MICR FORMAT 


Format: 


RaeeEREaKE 


* MICF « 


RSEereereerenwen 


KRHAEAREKEREEKERERE KREWE K 


* MICF COPX1l» COPX2 * 


RREAEREEKREREKEAKAKEREREK EK 


Functton: 


Format the data from the source fteld denoted by COPX!1 
tnto the destination field denoted by COPX2. 


The data type of both the source and the destination 
fields ts assumed to be unsigned 8=BIT. 


The fietd tength of the destination MODULO 20 must 
equati zero. The destination fietd ts considered to be 
composed of a number of 20 character subfields. 


Data movement ts right to teft beginning with the 
rightmost character of the source field and beginning 
with the rightmost character position of the 
destination field. 


In the discussion that foltlowss the following 
definitions apply: 


1- Transfer Characters are characters that are 
automatically transferred from the source fietd 
into the current destination subfietd. They never 
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3e 


occupy the rightmost controt character position of 
a destination subfield. They are the numeric “6" 
through "9" and the HYPHEN “-". The HYPHEN ts not 
expected to occur for OCR input. 


Defined control characters are characters that 
cause some specific action to be taken» depending 
on the character. They are: the END-OF*DOGCUMENT 
wew, the MICR CANT“READ “** and the OCR CANT“READ 
I3F ae 


Default controt characters are characters other 
than transfer and defined control characterse They 
are expected to bere but will not be tintited tor 
the MICR AMOUNT “#"%» TRANSIT “2" and ON“US *3" and 
the OCR HOOK “<5 FORK *"="5s CHAIR ">". VERTICAL 
BAR *!8"» BLANK 2402 and PLUS “¢*%. 


Operation 1s as follows: 


le 


Begin formatting into a subfieid by fetching a 
source field characters unless the source fietd is 
exhausteds and then proceeding to step lA. 


Ae If the source field is exhausteds assume an 
ENO“ OF*TDOCUMENT C€*) character and proceed to 
step 1B. 

Be If the source fietd character 1s an 
END-~OF“DOCUMENT character» move tt to the 
rightmost posttion of the current subfield» 


blank-fill the rest of the destination fieid 
and then terminate the operation. 


Ce. If the source field character is other than a 
defauit control or END~OF-DOCUMENT characters 
move a blank to the rightmost position of the 
current subfield» then move the source 
character and proceed to step 2A. 


De If the source fietd character is a default 
control character» move it to the rightmost 
position of the current subfield and then 
proceed to step 2A. 
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Ze 


Continue formatting into the current subfietd by 
fetching a new source character and then 
proceeding to step ZA« 


ke If the source field ts exhausted» blank-fill 
the rest of the current subfietid»s assume an 
FND~-DF-“DOCUMENT =sGurce character and proceed 
to step 1B. 


Be If the source fietd character is an 
END-OF-DOCUFENTY characters biank-fitt the rest 
of the current subfietds save the source field 
character and proceed to step 1B. 


Ce If the source field character tis cther than a 
default controt or END~OF-O00CUMENT characters 
Store the character tn the destination and 
proceed to step 2A. 


De If the source field character is a default 
controt character that is equal to the 
character in the rightmost positton of the 
current subfields move it ta the next position 
of the current subfitietds biank-filt the rest 
of the current subfieid send then proceed to 
step Lhe | 


Ee If the source fietd character is a default 
controt characters but it is not equat to the 
character in the rightmost position of the 
current subfietds the rest of the current 
subfietd ts btank-fttted and the controt 
character is used in step 1D» to which we now 
proceed. 


If any attempt ts made to exceed the size of any 
subfieid oor of the entire destination field» the 
overflow toggle is set to ones the operation is 
terminated and the contents of the destination 
field are undefined. 
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fe If any individual subftetd contatns a CANT“READ 


C("*" or *I33FaA> characterr, then the high order 
Cieftmost) position of the subfield witl be set to 
1101 Q0001> otherwises» it will be set to a blank 
€0100 0000). 
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MICR EDIT 


Formats 


kKakKKEAKKE 


* MICE x 


ReEKRKK IK 


RReEEARREKREEHRERKRAKEKEARKERKEaARERERE 


* MICE COPX1» COPX2s CUOPKS *# 


KRREEEKAKHEKRERKRKEAEEEERKRKERE EERE 


Functton: 


Nove data from the source field denoted by COPX1 to 
the destination field denoted by COPX2 deleting alt 
characters except numeric characters (0° through 79") 
and CANT“READ characters €"«*”" and @3F23~ 


The moved characters are right justified in the 
destination fietd and zero filled on the tUefts if 
necessaryre to filt the remaining destination area. If 
the destination field is lesser in stze than the moved 
data» the source data ts truncated on the left. 


A decimat count of all numeric characters moved is 
provided in the special COBOL register “TALLY™ denoted 
by COPX3.- 


The data type of the source fieid must be unsigned 
B8-BIT. fhe data type of the destination field must be 
unstgned 4&-BIT or &8-BIT. The data type of the "TALLY" 
fietd must be unsigned 4-BIT and its length is assumed 
to be five. 
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BRANCHING OPERANDS AND INSTRUCTIONS 


A branch address argument “BADDR™ has the fotlowing format: 


oh ae ab aR OD GP a an OD GF GD Oh Gt GF GF 23 2 £3 O° GH GD oF GD G2 GS OD GD a CS Cw 4S OD & aD GF GF 


DISPLACEMENT BTYPE SEGMENT NUMBER 
CBDISPB}3 C1) €7> 
20 Gm ee 6 Oa on ae ae we On Om OD Om FO am BO Be aD Oe oD OD §, am «2 «8 oF a oe oe a 
i i 
et present tf BYYPE = ji 
} 
i 
0> Relative to the current cede 
segment base Cintrasegment branch?) 
12 Relative to a new code segment base 
Cintersegment branch? 


Dispiacement tS an unsigned binary value which specifies the bit 
displacement oof an instruction relative to a segment basen. The 
container size of the displacement and BYYPE combined is a program 
parameter CBDISPBLd-. 
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BRANCH UNCONDITIONALLY 


Formats 


REEKKKEKRAEKEE 


* BUR BADDR * 


REAEKEKKREKENKKE 


Funct tons 


Obtain the next 
specified by BADDR. 
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* BUN « 
HQaeeenkn«k 
instruction from the Location 
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BRANCH ON OVERFLOW 


Formats 


RaEeErxxkknaee 


«* BOFL « 


RKRREKRKH 


RHEKRKERERAEEKERKEKE 


* BOFL Ve BADDR * 


KEKEREKEKEKEREKEEKE 


Function: 


If the overftow toggte equals Ves a transfer te the 
address CBADDR) given itn the instruction occurs,» 
otherwise control ts passed to the next sequential 
instruction. 


The overflow toggle ts unchangede The Length of Vis 
one bite 
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SET OVERFLOW TOGGLE 


Format: 


REKRKEKEKKERH 


* SOFL V * 


KKKKEKKKAKE 


Funct tons 


Set the overflow toggie toa V. 


The length of VY #sS one bite 


The 
ZERO*™ is 
S~operator 
the MICR format S~operator. 


NOTE: 


overflow toggie ts set to one 
encountered in 
or if a field overflow 
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Eaxekaxire 


* SOFL * 


ReEEKEKAKEK 


if a "DIVIDE BY 
DIVIDE SPECIAL 
is attempted in 


the 
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PERFORM ENTER 


Formats 


KREKKKREAHREKEKREKERELK 


* PERF fs» BADDR * 


KEKEEEAKEAKEKRKEBRAAEK 


Funct ton: 
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KRRAEKAKEEK 


* PERF * 


RAKRKKEKK 


Create a stack entry with the fotlouing formats 


DISPLACEMENT SEGMENT NO- K 
C24) (73 C8} 


> G2 Ge GP Gh Gn CS GR GS. GS CU GD GD GP GD GD OD GE GH GD G2 GF G2 GB 42 4 C8 GH GD G&S oD OD 


Insert a displacement vatues relative to the active 
code segment base and pointing to the next sequential 
Sg“instructions into the stack. 


Insert the current code seqment number into the stack. 
Insert the value of K from the instruction into the 


Stack. 


Adjust the stack pointer to point to the next possibie 
entry. 


Obtain the next =Instructicon from the Location 
specified by BADDR.~ 
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PERFORM EXIT 


Format: 


RERREKREKE 


« PXIT K * 


kkkakkeaAkeRe 


Funct ions 
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Ret KKKK 


* PXIT * 


KRKeKEENA 


Compare the K contatned in the instruction to the K in 
the current stack entry and if uneaual proceed to the 


next insCine S-instruction. 


pointer 


If equair adjust the stack 
to point to the previous entry and obtain the 


next S-instruction from the information contained in 


the removed stack entry. 
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ENTER 


Formats 


k&hkkekkaeekenetr 


* NTR BADDR * 


WaeRKEEKERKEKEKEK 


Function: 


Same function as “PERF™. 
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BK&EKEEL 


x NTR * 


RREEEKE 


K iS assumed equat tc zero. 


BURROUGHS CORPORATION 
CONPUTER SYSTEMS GROUP 
SANTA BARBARA PLANT 


EXIT 


Format <é 


REKRKEXK 


* XIT * 


RREKEKHK 


Funct tons 
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RReeKEEE 


* XITF * 


eReiiktkarne 


Same function as *PXIT*". * is assumed equal to zero. 
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GO TO DEPENDING 


Format: 


RaeSeKkeKe 


* GOYD * 


BEAXRKaRK 


RARARKEKEARREEEKAKREKAEAEKEKNRARAEAREEEKEKERA EK 


*« GOTD COPXi»s Ls DBADDRO» eeeosw DBADDRL * 


VRRaEEAKRAEEKEKAERKEAEKEEKEAEAEKEEACEERAEREREKKEKKH 


Funct tons 


Compare the ten bit binary value L with the variable 
specified by COPX1. Yhe variable ts ftrst converted to 
@ binary vatuers MODULO 2 to the 24th power. 


If the binary vatue cf the variable is tess than zere 
or greater than L» the next instruction is obtained 
from the location specified by DBADDRO. Note thet the 
vartable can be signed. 


If the binary value of the variable ts tn the range 
zero through Ls» it ts used as an tndex to select fron 
the List of DBADDR*s the appropriate DBADDR to be used 
to obtain the next instruction. 


DBADDR and BADOR have the same format with the 
exception that DBADDR wiit always contain the segment 
numbere Although segment number 18 unneccessary for 
those ODBADDR®*s with BIYPE equai to zeros itn order to 
index into the list of DBADDR*s» ait of the ODBADDR*s 
must be of equai tength.e. The container size of DBADDR 
is BDISP81i + 7. 
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ALTERED GO ¥O PARAGRAPH 


Format: 


KEk&kEKEARE 


* GPAR * 


&exaeraexknxet 


REKAKEKKEKEERE 


*® GPAR DADDR * 


KREKKKKEKAEEXENK 


Function: 


Obtain the next instruction from the location 
Specified by the address “ACON*™. 


The address constant *ACON" has the same format as a 
BADDR. 


The argument DADDR is an unsigned binary vaktue which 
specifies the digit displacement of the "ACON™ 
relative to the data segment zero base. 


The container size of DADDR ts DISPB. 


a752 


BURROUGHS CORPORATION COMPANY CONFIDENTIAL 
COMPUTER SYSTEMS GROUP B1700 COBOL S“LANGUAGE 
SANTA BARBARA PLANT PeSe 2201 6729 

ALTER 


Formats: 


KREKEKEAKE 


* ALTR *® 


KKkKKkETk&KkKE 


KAKKRAEAAKKEARRKREKAEAREKENE K 


*® ALTR DADDR»s ACON * 


RAEKEKKAKRAeEAKREKERKRERKKE 


Function: 


Copy the address constant “"ACON" tnto the data area 
specified by the argument DADODR. 


The address constant *“ACON® has the same format as a 
BADDR- 


The argument DADDR is an unsigned binary vatue which 
specifies the digqtt disptacement of the "ACON™ 
relative to the data segment zero basee 


The container stze of DADDR ts DISPB. 
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CONDITIONAL BRANCH OPERANDS AND INSTRUCTIONS 


If the conditton "A (R) B” 3s true a transfer to the address CBADDR) 
given in the instruction occurss otherwise control is passed to the 

next sequentiat instruction. The relatton (€(R)d ts defined = as 

foltoxs: 


000 UNDEFINED 


001 GTR 
010 LSS 
011 £NEQ 
100 =6EQL 
101 GEQ 
110 LEQ 


111 UNDEFINED 


Overlap of fieids is permitted. "A" is the first operand denoted in 
the itnstructione [If an instruction has onty one operands then the 
assumed fietd is the “A™ fteld. 
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COMPARE ALPHANUMERIC 


Format: 


ReEKKAKE 


* CMPA * 


xea&ktanwk tt 


RORARKRHEEREREEKAKEEKEKARAKEEKEKEKKEKE 


* CMPA OPND1Is COPX1» Re BADDR * 


RaARERWAKKKEKKAKEKAEERAKEAEHREAERKELE KEK 


Funct tons 


Compare the two operand fields according to their 
binary vatuese 


The comparison is performed tleft to right with any 
shorter operand assumed to be rightwfilied with blank 
characters €0100 0000 tf EBCDIEC or 0010 0000 if 
ASCII}. 


The fietds are considered equal when the equal size 
portions are equat and the tonger Cif one is tonger) 
field has trailing blanks. 


B8“BIT data format is assumed for both fietds with no 
checking to verify otherwise. Signed fields have their 
most significant four bits» ieee» their signe modifted 
to the appropriate numeric zone (1111 for EBCDICs 0011 
for ASCII) before being comparede This rodification is 
not permanent and 3s done so that sign witl not affect 
the resuit of an alphanumeric comparitsone 
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COMPARE NUHERTC 


Format: 


SeeREKEK 


* CMPN * 


B@keaetkeekenxk 


SKek&aeRkEKKAERAEEKEAKAKERAREKEKEKEEELK 


* CMPN OPND1is COPXi» Re BADDR «*& 


KAREABRKEEKEKRERKEREAEARHARAREREEREAEREK 


Function: 


Compare the two operand fietds according tec the 
algebraic values» considering the two fietds to be 
comprised of decimal tntegerse 


When the fieid sizes are dtfferents» the longer 1s 
tested for leading zeros (€0000).£ =Fhere is No 
restriction as to data typee In comparing an 8&8-BIT 
character only the rightmost four bits of the 
character are considereds the other bits are ignored. 


Two fields of ati zeros are equat regardless of Signe 


Unsigned fields are considered posttive. Sign 
conventions are the same as for arithmetic operands. 


Resutts generated by invatid digit values are 
undefined. 
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COMPARE FOR ZERSS 


Formats 


KKERRKK 


* CMPZ «& 


Raaxkenatk 


KAaKEAEEKARERAEREEAREARKAREEK 


* CMPZ COPX1> Rs» BADDR « 


RAREKAKEKAEERKRARKBRERKERKEAKEREE 


Function: 


Compare two operand fteltlds according to their 
algebraic values» assuming the first field to be 
comprised of ati zeros (0000}3- 


There ts no restriction as to data typee In comparing 
an 8“BIT character onty the rightmost four bits of the 
character are considerede The other btts are ignorede 


Txo fields of att zeros are equat regardtess of signe 


Unsigned fields are considered positive. Sign 
conventions are the same as for arithmetic operandse 


Results generated by invalid digit vatues are 
undefined. 
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Format: 


RRKEKRER 


* CMPS * 


trmaxkeknn 


KRARABRARRRaKREREREKRARERKE KE 


zt CMPS COPX1» R» BADDR «+ 


eae REAKEKAKEKEERKRE RE 


Funct ions 


Compare two ocperand fields according to their binary 
values» assuming the first fteld to be comprised af 
all spaces €0100 0000 if EBCDIC or 0010 0000 if 
ASCII}. 


The comparison is performed left to right. 


Unsigned 8-BIT format is assumed with no checking to 
verify otherwise. 
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COMPARE FOR CLASS 


Formats: 


KKK KEKE 


*& CHPC « 


RBkekakaKEKXK 


REKEKREDAKRAEREKKKKKKKKKKK 


* CMPC COPXi»s Cs BADDR « 


KReEEEREKAAREEKEEKAUEAREKNKKAEK 


Functions: 


Compare the operand fietd and determine whether the 
field is: 


C=00 COMPLETELY ALPHABETIC 
O01 COMPLETELY NUMERIC 
10 NOT COMPLETELY ALPHABETIC 
11 NOY COMPLETELY NUMERIC 


If the condition being tested ts trues a transfer to 
the address BADDR given in the instruction occurss 
otherwise control is passed to the next sequential 
instructton. 


In the alphabetic tests each character is 
range-checked for 1100 0001 through 1100 10015 1101 
0001 through 1101 100i» 1110 0010 through 1110 1001 
and for 0100 0000. Unsigned 8-BIT format is assumed 
with no checking to verify otherwise. 


In the numeric test each character is range-checked 
for 1111 0000 through 1111 1001. Signed or unsigned 
8-BIT format is permitted. The four bits in the sign 
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post¢ton of a stgned B8-BIT field are tqnorede The sign 
positton is the leftmost four bits of the most 
Significant character. 
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COMPARE REPEAT 


Format: 


BKE&EKEKeEAEK 


* CHPR « 


&ae&itgKAKK 


RRAEKREKAAEAAKKAREKARKHEREKEEKEKREEKEREEK 


* CMPR OPNDie COPX1l» Rs BADDR * 


KRREAEKKBREEREREREKREAEKAKEERKREEAAEREKEE 


Funct ton: 


Compare the two operand fieids according to their 
binary value. 


Comparison proceeds from left ta right. 


The field lengths are considered equal by repeating 
OPND1. 
Both ftelds are assumed to have unsigned 8-BIT data 
type. 


The size of OPND1 must divide eventy into the size of 
COPX1> otherwises the resuits of the compare may be 
erroneouSe 
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MISCELLANEOUS INSTRUCTION 


COMMUNICATE 


Formats 


KERKEEKEREEKERKREL 


* COMM COPX1 * 


KERCKEREAEKAEKESK 


Function: 
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xkKk&EEKEKE 


= COMM * 


RMEKEKRAKE 


Move the length and address fields from the COPX1 
entry to the RS-COMMUNICATE.MSGePTR fietd Located iin 
this program®s RSs«NUCLEUS» converting them enroute. 


The origin fieid 


1s unchanged. 


The tength is converted from a digit or character 
tength to a bit length. The address ts stored as an 
absotute bit address. 
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LOAD COMMUNICATE REPLY 


Formats 


KSKEEKEARKEEA RE 


* LDCR DADDR * 


EKKkkK a EREKKE 


Function: 


Move the fast 2& bits of 
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RA2aAKKKAKK 


* LDCR * 


eEKeanrxnenrnxk 


information from the RS.«REPLY 


area of the RS.~NUCLEUS to the Location specified by 


DADDR.« 


See *HAKE PRESENT*® 


for definition of DADDR. 
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CONVERT 


KeEeKRKEEK 


* CONV * 


&k&aeekecnxkenre 


Format: 


KRKEEKAKEEKEAEHEEEREPTREER 


# CONV COPXi DADDR * 


EKREKACRKEEKKERGDAERARRE 


Funct tons 


Convert the operand denoted by COPX1 from a decimal 
value to an unsigned 24 bit binary vatuer truncating 
or zero fiiting on the left if necessarye Piace the 
result at the Location specified by DADDR. 


The operand must be etther unsigned 4“BIT or unstaqned 
B-BIT units. 


See "MAKE PRESENT® for definition of DADDR- 


BURROUGHS CORPORATION 
COMPUTER SYSTEMS GROUP 
SANTA BARBARA PLANT 


MAKE PRESENT 


Formats 


WHEE KAKEKAREKRHREEKKER EK 


* MAKP COPX1s DADDR « 


RERAKEAKENAREKREKRE TEKKEK 


Functtons 
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RRaexeakket 


* MAKP ¥* 


ak&aekkK KEE 


Load the data segment specifted by COPXi and place the 
base relative address of the data area specified by 
COPX1 tnto the 24 bit location specified by DADDR. 


DADDR 1S an unsigned binary vatue which specifies a 
digit disptacement from the data segment zero basee 


The container size of DADDR is DISPB. 
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HARDWARE HONITOR 
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Format? 


SK&eareaenraxrk 


* HMON * 


RRALcKKAkK 


KReEkKEEKKEKKAKE K 


* HMON OPNDI * 


Keke eReRERREKEK 


Function: 


The lou order eight bits of the fteld described by 
OPNDI are used as the ftnput to the Ronitor 
matcromoperator described in the following product 
specifications: 


¥i913 1747 
¥2201 6760 


M-Hemory Processor 
S“Memory Processor 


The length of the field described by OPND1L must be 
greater than or equat to eight bits. 
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